home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / enigma / earcd / editor / editor1 / envgde10.lha / envGDE10 / Install < prev    next >
Text File  |  1996-12-07  |  4KB  |  170 lines

  1. ; $VER: 1.0 All rights reserved.
  2.  
  3. (delopts "oknodelete" "force" "askuser")
  4. (complete 0)
  5.  
  6. (if (exists "GOLDED:" (NOREQ))
  7.  
  8.     (
  9.         (set vernum (getversion "golded:golded"))
  10.  
  11.         (set ver (/ vernum 65536))
  12.         (set rev (- vernum (* ver 65536)))
  13.  
  14.         (set version (+ (* 10 ver) rev))
  15.  
  16.         (if (< version 44)
  17.  
  18.             (
  19.                 (message "\nSorry, GoldED 4.4.0 or better required")
  20.  
  21.                 (exit (quiet))
  22.             )
  23.         )
  24.  
  25.         (message (cat "\n"
  26.  
  27.             "                                            \n"
  28.             "AmigaGuide Publishing Extensions            \n"
  29.             "                                            \n"
  30.             "©1996 Dietmar Eilert                        \n"
  31.             "      All Rights Reserved.                  \n"
  32.             "                                            \n"
  33.             "      E-Mail: dietmar@tomate.tng.oche.de    \n"
  34.             "                                            \n"
  35.             "GoldED Release 4.4.0+ required.             \n"
  36.         ))
  37.  
  38.         (copylib
  39.  
  40.             (prompt "Install syntax parser ?")
  41.             (source "syntax/warpGUIDE.parser")
  42.             (dest   "golded:syntax")
  43.             (confirm)
  44.             (help @copylib-help)
  45.         )
  46.  
  47.         ; install registry editor (if not yet installed)
  48.  
  49.         (if (not (exists "golded:tools"))
  50.  
  51.             (makedir "golded:tools")
  52.         )
  53.  
  54.         (if (not (exists "golded:tools/regedit"))
  55.  
  56.             (makedir "golded:tools/regedit")
  57.         )
  58.  
  59.         (copylib
  60.  
  61.             (prompt "Install registry editor ?")
  62.             (source "bin/regedit" )
  63.             (dest   "golded:tools/regedit")
  64.             (confirm)
  65.             (help @copylib-help)
  66.         )
  67.  
  68.         ; install basic files
  69.  
  70.         (if (not (exists "golded:tools/makeguide"))
  71.  
  72.             (makedir "golded:tools/makeguide")
  73.         )
  74.  
  75.         (copyfiles
  76.  
  77.             (source "makeguide")
  78.             (dest   "golded:tools/makeguide")
  79.             (all)
  80.         )
  81.  
  82.         ; install scanner
  83.  
  84.         (if (not (exists "golded:scanner"))
  85.  
  86.             (makedir "golded:scanner")
  87.         )
  88.  
  89.         (copyfiles
  90.  
  91.             (source "scanner")
  92.             (dest   "golded:scanner")
  93.             (all)
  94.         )
  95.  
  96.         ; install toolbar images
  97.  
  98.         (if (exists "toolbar") (
  99.  
  100.             (set hicolor
  101.  
  102.                 (askchoice
  103.  
  104.                     (prompt "\nSelect toolbar style:\n")
  105.  
  106.                     (choices
  107.  
  108.                         "4  colors"
  109.                         "8+ colors"
  110.                     )
  111.  
  112.                     (default 1)
  113.  
  114.                     (help (cat "\n"
  115.  
  116.                         " You can use both styles on all screens. The 4\n"
  117.                         " color style has been optimized for 4-color   \n"
  118.                         " screens. The 8+ style has been optimized for \n"
  119.                         " screens with eight or more colors.           \n"
  120.                     ))
  121.                 )
  122.             )
  123.  
  124.             (if (not (exists "golded:toolbar"))
  125.  
  126.                 (makedir "golded:toolbar")
  127.             )
  128.  
  129.             (if (not (exists "golded:toolbar/makeguide"))
  130.  
  131.                 (makedir "golded:toolbar/makeguide")
  132.             )
  133.  
  134.             (copyfiles
  135.  
  136.                 (source "toolbar")
  137.                 (dest   "golded:toolbar")
  138.                 (all)
  139.             )
  140.  
  141.             (if (= hicolor 1)
  142.  
  143.                 (copyfiles
  144.  
  145.                     (source "toolbar16")
  146.                     (dest   "golded:toolbar")
  147.                     (nogauge)
  148.                     (all)
  149.                 )
  150.             )
  151.         ))
  152.  
  153.         ; update registry
  154.  
  155.         (working "Updating registry...")
  156.  
  157.         (run "golded:tools/regedit/regedit script=install.bat")
  158.     )
  159.  
  160.     (message (cat "\n"
  161.  
  162.         "Please install GoldED before attempting to\n"
  163.         "install this client.                      \n"
  164.     ))
  165. )
  166.  
  167. (exit (quiet))
  168.  
  169. (welcome)
  170.